home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / A-An / 4TrackStack2.cpt / 4-Track Stack / card_4237.txt < prev    next >
Text File  |  1989-05-02  |  15KB  |  649 lines
  1. -- card: 4237 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2968
  5. -- name: 
  6.  
  7.  
  8. -- part 46 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=31 top=73 right=105 bottom=65
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 5202 / 5202
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Trim1
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   put the short name of me into theField
  23.   if the optionkey is down then
  24.     subtract 1 from bkgnd field theField
  25.   else
  26.     add 1 to bkgnd field theField
  27.   end if
  28.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  29.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  30.   set the icon of me to (5200 + bkgnd field theField)
  31. end mouseUp
  32.  
  33.  
  34.  
  35. -- part 47 (button)
  36. -- low flags: 00
  37. -- high flags: 2000
  38. -- rect: left=78 top=73 right=105 bottom=112
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 5208 / 5208
  41. -- text alignment: 1
  42. -- font id: 0
  43. -- text size: 12
  44. -- style flags: 0
  45. -- line height: 16
  46. -- part name: Trim2
  47. ----- HyperTalk script -----
  48. on mouseUp
  49.   put the short name of me into theField
  50.   if the optionkey is down then
  51.     subtract 1 from bkgnd field theField
  52.   else
  53.     add 1 to bkgnd field theField
  54.   end if
  55.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  56.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  57.   set the icon of me to (5200 + bkgnd field theField)
  58. end mouseUp
  59.  
  60.  
  61.  
  62. -- part 48 (button)
  63. -- low flags: 00
  64. -- high flags: 2000
  65. -- rect: left=126 top=73 right=105 bottom=160
  66. -- title width / last selected line: 0
  67. -- icon id / first selected line: 5210 / 5210
  68. -- text alignment: 1
  69. -- font id: 0
  70. -- text size: 12
  71. -- style flags: 0
  72. -- line height: 16
  73. -- part name: Trim3
  74. ----- HyperTalk script -----
  75. on mouseUp
  76.   put the short name of me into theField
  77.   if the optionkey is down then
  78.     subtract 1 from bkgnd field theField
  79.   else
  80.     add 1 to bkgnd field theField
  81.   end if
  82.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  83.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  84.   set the icon of me to (5200 + bkgnd field theField)
  85. end mouseUp
  86.  
  87.  
  88.  
  89. -- part 49 (button)
  90. -- low flags: 00
  91. -- high flags: 2000
  92. -- rect: left=171 top=73 right=105 bottom=205
  93. -- title width / last selected line: 0
  94. -- icon id / first selected line: 5202 / 5202
  95. -- text alignment: 1
  96. -- font id: 0
  97. -- text size: 12
  98. -- style flags: 0
  99. -- line height: 16
  100. -- part name: Trim4
  101. ----- HyperTalk script -----
  102. on mouseUp
  103.   put the short name of me into theField
  104.   if the optionkey is down then
  105.     subtract 1 from bkgnd field theField
  106.   else
  107.     add 1 to bkgnd field theField
  108.   end if
  109.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  110.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  111.   set the icon of me to (5200 + bkgnd field theField)
  112. end mouseUp
  113.  
  114.  
  115.  
  116. -- part 50 (button)
  117. -- low flags: 00
  118. -- high flags: 2000
  119. -- rect: left=31 top=109 right=141 bottom=65
  120. -- title width / last selected line: 0
  121. -- icon id / first selected line: 5312 / 5312
  122. -- text alignment: 1
  123. -- font id: 0
  124. -- text size: 12
  125. -- style flags: 0
  126. -- line height: 16
  127. -- part name: Hi1
  128. ----- HyperTalk script -----
  129. on mouseUp
  130.   put the short name of me into theField
  131.   if the optionkey is down then
  132.     subtract 1 from bkgnd field theField
  133.   else
  134.     add 1 to bkgnd field theField
  135.   end if
  136.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  137.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  138.   set the icon of me to (5300 + bkgnd field theField)
  139. end mouseUp
  140.  
  141.  
  142.  
  143. -- part 51 (button)
  144. -- low flags: 00
  145. -- high flags: 2000
  146. -- rect: left=78 top=109 right=141 bottom=112
  147. -- title width / last selected line: 0
  148. -- icon id / first selected line: 5305 / 5305
  149. -- text alignment: 1
  150. -- font id: 0
  151. -- text size: 12
  152. -- style flags: 0
  153. -- line height: 16
  154. -- part name: Hi2
  155. ----- HyperTalk script -----
  156. on mouseUp
  157.   put the short name of me into theField
  158.   if the optionkey is down then
  159.     subtract 1 from bkgnd field theField
  160.   else
  161.     add 1 to bkgnd field theField
  162.   end if
  163.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  164.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  165.   set the icon of me to (5300 + bkgnd field theField)
  166. end mouseUp
  167.  
  168.  
  169.  
  170. -- part 52 (button)
  171. -- low flags: 00
  172. -- high flags: 2000
  173. -- rect: left=126 top=109 right=141 bottom=160
  174. -- title width / last selected line: 0
  175. -- icon id / first selected line: 5303 / 5303
  176. -- text alignment: 1
  177. -- font id: 0
  178. -- text size: 12
  179. -- style flags: 0
  180. -- line height: 16
  181. -- part name: Hi3
  182. ----- HyperTalk script -----
  183. on mouseUp
  184.   put the short name of me into theField
  185.   if the optionkey is down then
  186.     subtract 1 from bkgnd field theField
  187.   else
  188.     add 1 to bkgnd field theField
  189.   end if
  190.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  191.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  192.   set the icon of me to (5300 + bkgnd field theField)
  193. end mouseUp
  194.  
  195.  
  196.  
  197. -- part 53 (button)
  198. -- low flags: 00
  199. -- high flags: 2000
  200. -- rect: left=171 top=109 right=141 bottom=205
  201. -- title width / last selected line: 0
  202. -- icon id / first selected line: 5312 / 5312
  203. -- text alignment: 1
  204. -- font id: 0
  205. -- text size: 12
  206. -- style flags: 0
  207. -- line height: 16
  208. -- part name: Hi4
  209. ----- HyperTalk script -----
  210. on mouseUp
  211.   put the short name of me into theField
  212.   if the optionkey is down then
  213.     subtract 1 from bkgnd field theField
  214.   else
  215.     add 1 to bkgnd field theField
  216.   end if
  217.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  218.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  219.   set the icon of me to (5300 + bkgnd field theField)
  220. end mouseUp
  221.  
  222.  
  223.  
  224. -- part 54 (button)
  225. -- low flags: 00
  226. -- high flags: 2000
  227. -- rect: left=31 top=145 right=177 bottom=65
  228. -- title width / last selected line: 0
  229. -- icon id / first selected line: 5312 / 5312
  230. -- text alignment: 1
  231. -- font id: 0
  232. -- text size: 12
  233. -- style flags: 0
  234. -- line height: 16
  235. -- part name: Lo1
  236. ----- HyperTalk script -----
  237. on mouseUp
  238.   put the short name of me into theField
  239.   if the optionkey is down then
  240.     subtract 1 from bkgnd field theField
  241.   else
  242.     add 1 to bkgnd field theField
  243.   end if
  244.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  245.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  246.   set the icon of me to (5300 + bkgnd field theField)
  247. end mouseUp
  248.  
  249.  
  250.  
  251. -- part 55 (button)
  252. -- low flags: 00
  253. -- high flags: 2000
  254. -- rect: left=78 top=145 right=177 bottom=112
  255. -- title width / last selected line: 0
  256. -- icon id / first selected line: 5302 / 5302
  257. -- text alignment: 1
  258. -- font id: 0
  259. -- text size: 12
  260. -- style flags: 0
  261. -- line height: 16
  262. -- part name: Lo2
  263. ----- HyperTalk script -----
  264. on mouseUp
  265.   put the short name of me into theField
  266.   if the optionkey is down then
  267.     subtract 1 from bkgnd field theField
  268.   else
  269.     add 1 to bkgnd field theField
  270.   end if
  271.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  272.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  273.   set the icon of me to (5300 + bkgnd field theField)
  274. end mouseUp
  275.  
  276.  
  277.  
  278. -- part 56 (button)
  279. -- low flags: 00
  280. -- high flags: 2000
  281. -- rect: left=126 top=145 right=177 bottom=160
  282. -- title width / last selected line: 0
  283. -- icon id / first selected line: 5302 / 5302
  284. -- text alignment: 1
  285. -- font id: 0
  286. -- text size: 12
  287. -- style flags: 0
  288. -- line height: 16
  289. -- part name: Lo3
  290. ----- HyperTalk script -----
  291. on mouseUp
  292.   put the short name of me into theField
  293.   if the optionkey is down then
  294.     subtract 1 from bkgnd field theField
  295.   else
  296.     add 1 to bkgnd field theField
  297.   end if
  298.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  299.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  300.   set the icon of me to (5300 + bkgnd field theField)
  301. end mouseUp
  302.  
  303.  
  304.  
  305. -- part 57 (button)
  306. -- low flags: 00
  307. -- high flags: 2000
  308. -- rect: left=171 top=145 right=177 bottom=205
  309. -- title width / last selected line: 0
  310. -- icon id / first selected line: 5301 / 5301
  311. -- text alignment: 1
  312. -- font id: 0
  313. -- text size: 12
  314. -- style flags: 0
  315. -- line height: 16
  316. -- part name: Lo4
  317. ----- HyperTalk script -----
  318. on mouseUp
  319.   put the short name of me into theField
  320.   if the optionkey is down then
  321.     subtract 1 from bkgnd field theField
  322.   else
  323.     add 1 to bkgnd field theField
  324.   end if
  325.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  326.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  327.   set the icon of me to (5300 + bkgnd field theField)
  328. end mouseUp
  329.  
  330.  
  331.  
  332. -- part 58 (button)
  333. -- low flags: 00
  334. -- high flags: 2000
  335. -- rect: left=31 top=180 right=212 bottom=65
  336. -- title width / last selected line: 0
  337. -- icon id / first selected line: 5408 / 5408
  338. -- text alignment: 1
  339. -- font id: 0
  340. -- text size: 12
  341. -- style flags: 0
  342. -- line height: 16
  343. -- part name: Pan1
  344. ----- HyperTalk script -----
  345. on mouseUp
  346.   put the short name of me into theField
  347.   if the optionkey is down then
  348.     subtract 1 from bkgnd field theField
  349.   else
  350.     add 1 to bkgnd field theField
  351.   end if
  352.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  353.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  354.   set the icon of me to (5400 + bkgnd field theField)
  355. end mouseUp
  356.  
  357.  
  358.  
  359. -- part 59 (button)
  360. -- low flags: 00
  361. -- high flags: 2000
  362. -- rect: left=78 top=180 right=212 bottom=112
  363. -- title width / last selected line: 0
  364. -- icon id / first selected line: 5404 / 5404
  365. -- text alignment: 1
  366. -- font id: 0
  367. -- text size: 12
  368. -- style flags: 0
  369. -- line height: 16
  370. -- part name: Pan2
  371. ----- HyperTalk script -----
  372. on mouseUp
  373.   put the short name of me into theField
  374.   if the optionkey is down then
  375.     subtract 1 from bkgnd field theField
  376.   else
  377.     add 1 to bkgnd field theField
  378.   end if
  379.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  380.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  381.   set the icon of me to (5400 + bkgnd field theField)
  382. end mouseUp
  383.  
  384.  
  385.  
  386. -- part 60 (button)
  387. -- low flags: 00
  388. -- high flags: 2000
  389. -- rect: left=126 top=180 right=212 bottom=160
  390. -- title width / last selected line: 0
  391. -- icon id / first selected line: 5411 / 5411
  392. -- text alignment: 1
  393. -- font id: 0
  394. -- text size: 12
  395. -- style flags: 0
  396. -- line height: 16
  397. -- part name: Pan3
  398. ----- HyperTalk script -----
  399. on mouseUp
  400.   put the short name of me into theField
  401.   if the optionkey is down then
  402.     subtract 1 from bkgnd field theField
  403.   else
  404.     add 1 to bkgnd field theField
  405.   end if
  406.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  407.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  408.   set the icon of me to (5400 + bkgnd field theField)
  409. end mouseUp
  410.  
  411.  
  412.  
  413. -- part 61 (button)
  414. -- low flags: 00
  415. -- high flags: 2000
  416. -- rect: left=171 top=180 right=212 bottom=205
  417. -- title width / last selected line: 0
  418. -- icon id / first selected line: 5407 / 5407
  419. -- text alignment: 1
  420. -- font id: 0
  421. -- text size: 12
  422. -- style flags: 0
  423. -- line height: 16
  424. -- part name: Pan4
  425. ----- HyperTalk script -----
  426. on mouseUp
  427.   put the short name of me into theField
  428.   if the optionkey is down then
  429.     subtract 1 from bkgnd field theField
  430.   else
  431.     add 1 to bkgnd field theField
  432.   end if
  433.   if bkgnd field theField > 12 then put 1 into bkgnd field theField
  434.   if bkgnd field theField < 1 then put 12 into bkgnd field theField
  435.   set the icon of me to (5400 + bkgnd field theField)
  436. end mouseUp
  437.  
  438.  
  439.  
  440. -- part 62 (button)
  441. -- low flags: 00
  442. -- high flags: 2000
  443. -- rect: left=32 top=259 right=276 bottom=66
  444. -- title width / last selected line: 0
  445. -- icon id / first selected line: 6000 / 6000
  446. -- text alignment: 1
  447. -- font id: 0
  448. -- text size: 12
  449. -- style flags: 0
  450. -- line height: 16
  451. -- part name: Level1 Slider
  452. ----- HyperTalk script -----
  453. on mouseUp
  454.   send mouseup to bkgnd btn "level1"
  455. end mouseUp
  456.  
  457.  
  458.  
  459. -- part 63 (button)
  460. -- low flags: 00
  461. -- high flags: 2000
  462. -- rect: left=80 top=259 right=276 bottom=113
  463. -- title width / last selected line: 0
  464. -- icon id / first selected line: 6000 / 6000
  465. -- text alignment: 1
  466. -- font id: 0
  467. -- text size: 12
  468. -- style flags: 0
  469. -- line height: 16
  470. -- part name: Level2 Slider
  471. ----- HyperTalk script -----
  472. on mouseUp
  473.   send mouseup to bkgnd btn "level2"
  474. end mouseUp
  475.  
  476.  
  477.  
  478. -- part 64 (button)
  479. -- low flags: 00
  480. -- high flags: 2000
  481. -- rect: left=127 top=259 right=276 bottom=160
  482. -- title width / last selected line: 0
  483. -- icon id / first selected line: 6000 / 6000
  484. -- text alignment: 1
  485. -- font id: 0
  486. -- text size: 12
  487. -- style flags: 0
  488. -- line height: 16
  489. -- part name: Level3 Slider
  490. ----- HyperTalk script -----
  491. on mouseUp
  492.   send mouseup to bkgnd btn "level3"
  493. end mouseUp
  494.  
  495.  
  496.  
  497. -- part 65 (button)
  498. -- low flags: 00
  499. -- high flags: 2000
  500. -- rect: left=172 top=239 right=256 bottom=205
  501. -- title width / last selected line: 0
  502. -- icon id / first selected line: 6000 / 6000
  503. -- text alignment: 1
  504. -- font id: 0
  505. -- text size: 12
  506. -- style flags: 0
  507. -- line height: 16
  508. -- part name: Level4 Slider
  509. ----- HyperTalk script -----
  510. on mouseUp
  511.   send mouseup to bkgnd btn "level4"
  512. end mouseUp
  513.  
  514.  
  515.  
  516. -- part contents for background part 27
  517. ----- text -----
  518. Lead Voc.
  519.  
  520. -- part contents for background part 26
  521. ----- text -----
  522. Drums
  523.  
  524. -- part contents for background part 25
  525. ----- text -----
  526. Back. Voc.
  527.  
  528. -- part contents for background part 24
  529. ----- text -----
  530. Guitars, Bass
  531.  
  532. -- part contents for background part 69
  533. ----- text -----
  534. Tape #1b2c
  535.  
  536. -- part contents for background part 70
  537. ----- text -----
  538. Hoss Cartright
  539.  
  540. -- part contents for background part 71
  541. ----- text -----
  542. Little Joe and Adam
  543.  
  544. -- part contents for background part 72
  545. ----- text -----
  546. 5/2/89
  547.  
  548. -- part contents for background part 23
  549. ----- text -----
  550. 0000
  551.  
  552. -- part contents for background part 22
  553. ----- text -----
  554. 5:37
  555.  
  556. -- part contents for background part 73
  557. ----- text -----
  558. I can't be a cowboy without my horse
  559.  
  560. -- part contents for background part 79
  561. ----- text -----
  562. 908766
  563.  
  564. -- part contents for background part 28
  565. ----- text -----
  566. 2
  567.  
  568. -- part contents for background part 29
  569. ----- text -----
  570. 8
  571.  
  572. -- part contents for background part 40
  573. ----- text -----
  574. 8
  575.  
  576. -- part contents for background part 41
  577. ----- text -----
  578. 4
  579.  
  580. -- part contents for background part 42
  581. ----- text -----
  582. 11
  583.  
  584. -- part contents for background part 43
  585. ----- text -----
  586. 7
  587.  
  588. -- part contents for background part 39
  589. ----- text -----
  590. 1
  591.  
  592. -- part contents for background part 38
  593. ----- text -----
  594. 2
  595.  
  596. -- part contents for background part 37
  597. ----- text -----
  598. 2
  599.  
  600. -- part contents for background part 36
  601. ----- text -----
  602. 12
  603.  
  604. -- part contents for background part 32
  605. ----- text -----
  606. 12
  607.  
  608. -- part contents for background part 33
  609. ----- text -----
  610. 5
  611.  
  612. -- part contents for background part 34
  613. ----- text -----
  614. 3
  615.  
  616. -- part contents for background part 35
  617. ----- text -----
  618. 12
  619.  
  620. -- part contents for background part 45
  621. ----- text -----
  622. 6
  623.  
  624. -- part contents for background part 46
  625. ----- text -----
  626. 6
  627.  
  628. -- part contents for background part 30
  629. ----- text -----
  630. 10
  631.  
  632. -- part contents for background part 44
  633. ----- text -----
  634. 6
  635.  
  636. -- part contents for background part 89
  637. ----- text -----
  638. I can't be a cowboy
  639. Without my horse
  640. She went and left me
  641. I'm lonely, of course
  642.  
  643. -- part contents for background part 31
  644. ----- text -----
  645. 2
  646.  
  647. -- part contents for background part 47
  648. ----- text -----
  649. 8